Sub Main()	dim a[3] as string	dim s as string		a[0] = "Jose"	a[1] = "L"	a[2] = "Cuevas"

	s = a[0]

	msgbox("Hello " & s)
end sub